home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 234
- Top = 95
- Width = 387
- Height = 460
- BorderIcons = [biSystemMenu, biMinimize]
- Caption = 'WebSnap (unregistered demo)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Menu = MainMenu1
- Position = poScreenCenter
- Visible = True
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object GroupBox3: TGroupBox
- Left = 0
- Top = 45
- Width = 379
- Height = 54
- Align = alTop
- TabOrder = 0
- object Label2: TLabel
- Left = 13
- Top = 9
- Width = 28
- Height = 13
- Caption = 'Hours'
- end
- object Label3: TLabel
- Left = 73
- Top = 9
- Width = 25
- Height = 13
- Caption = 'Mins.'
- end
- object Label4: TLabel
- Left = 127
- Top = 9
- Width = 22
- Height = 13
- Caption = 'Sec.'
- end
- object Label1: TLabel
- Left = 15
- Top = 265
- Width = 3
- Height = 13
- end
- object SpinEdit1: TSpinEdit
- Left = 12
- Top = 25
- Width = 49
- Height = 22
- TabStop = False
- Ctl3D = False
- EditorEnabled = False
- Enabled = False
- MaxLength = 5
- MaxValue = 23
- MinValue = 0
- ParentCtl3D = False
- TabOrder = 0
- Value = 0
- end
- object SpinEdit2: TSpinEdit
- Left = 70
- Top = 25
- Width = 49
- Height = 22
- TabStop = False
- Ctl3D = False
- EditorEnabled = False
- Enabled = False
- MaxLength = 5
- MaxValue = 59
- MinValue = 0
- ParentCtl3D = False
- TabOrder = 1
- Value = 0
- end
- object SpinEdit3: TSpinEdit
- Left = 125
- Top = 25
- Width = 49
- Height = 22
- TabStop = False
- Ctl3D = False
- EditorEnabled = False
- MaxLength = 5
- MaxValue = 59
- MinValue = 0
- ParentCtl3D = False
- TabOrder = 2
- Value = 1
- end
- end
- object GroupBox4: TGroupBox
- Left = 0
- Top = 99
- Width = 379
- Height = 295
- Align = alTop
- TabOrder = 1
- object Image1: TImage
- Left = 2
- Top = 15
- Width = 375
- Height = 278
- Align = alClient
- end
- end
- object CoolBar1: TCoolBar
- Left = 0
- Top = 0
- Width = 379
- Height = 45
- Bands = <>
- object SpeedButton1: TSpeedButton
- Left = 3
- Top = 1
- Width = 40
- Height = 38
- Caption = 'start'
- Flat = True
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
- 00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
- 70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333
- 70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033
- 70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333
- 70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333
- 70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
- 00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
- Layout = blGlyphTop
- NumGlyphs = 2
- OnClick = SpeedButton1Click
- end
- object SpeedButton2: TSpeedButton
- Left = 49
- Top = 1
- Width = 40
- Height = 38
- Caption = 'stop'
- Flat = True
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
- 00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
- 70E337F33333333337F3E0F33333333370E337F333FFFFF337F3E0F330000033
- 70E337F3377777F337F3E0F33000003370E337F3377777F337F3E0F330000033
- 70E337F3377777F337F3E0F33000003370E337F3377777F337F3E0F330000033
- 70E337F33777773337F3E0F33333333370E337F33333333337F3E0F333333333
- 70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
- 00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
- Layout = blGlyphTop
- NumGlyphs = 2
- OnClick = SpeedButton2Click
- end
- object bitBtn2: TSpeedButton
- Left = 94
- Top = 1
- Width = 52
- Height = 38
- Caption = 'register'
- Flat = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333300333
- 33333333333773FF333333333330F0033333333333373773FF333333330FFFF0
- 03333333337F333773FF3333330FFFFFF003333333733FF33773333330FF00FF
- FF80333337F3773F3337333330FFFF0FFFF03FFFF7FFF3733F3700000000FFFF
- 0FF0777777773FF373370000000000FFFFF07FFFFFF377FFF3370CCCCC000000
- FF037777773337773F7300CCC000003300307F77733337F37737000C00000033
- 33307F373333F7F333370000007B703333307FFFF337F7F33337099900BBB033
- 33307777F37777FF33370999007B700333037777F3373773FF73099900000030
- 00337777FFFFF7F7773300000000003333337777777777333333}
- Layout = blGlyphTop
- NumGlyphs = 2
- ParentFont = False
- OnClick = BitBtn2Click
- end
- object SpeedButton3: TSpeedButton
- Left = 149
- Top = 1
- Width = 40
- Height = 38
- Caption = 'exit'
- Flat = True
- Glyph.Data = {
- BA030000424DBA030000000000003600000028000000140000000F0000000100
- 1800000000008403000000000000000000000000000000000000C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800000800000C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0800000008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0800000008000008000008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0800000008000
- 008000008000008000008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C080000000800000800000800000
- FF00008000008000008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000800000800000800000FF00C0C0C000FF
- 00008000008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C000FF0000800000FF00C0C0C0C0C0C0C0C0C000FF00
- 008000008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C000FF00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FF0000
- 8000008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FF000080
- 00008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FF00008000
- 008000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FF0000800000
- 8000008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FF000080000080
- 00008000800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FF00008000008000
- 800000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FF00008000008000C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
- C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000FF00C0C0C0C0C0C0}
- Layout = blGlyphTop
- OnClick = SpeedButton3Click
- end
- end
- object StatusBar1: TStatusBar
- Left = 0
- Top = 395
- Width = 379
- Height = 19
- Panels = <>
- SimplePanel = False
- end
- object Timer1: TTimer
- OnTimer = Timer1Timer
- Left = 2
- Top = 284
- end
- object MainMenu1: TMainMenu
- Left = 38
- Top = 282
- object File1: TMenuItem
- Caption = '&File'
- object Setup1: TMenuItem
- Caption = '&Start'
- OnClick = Setup1Click
- end
- object sTop1: TMenuItem
- Caption = 'S&top'
- OnClick = sTop1Click
- end
- object eXit1: TMenuItem
- Caption = 'E&xit'
- OnClick = eXit1Click
- end
- end
- object Setup2: TMenuItem
- Caption = '&Setup'
- OnClick = Setup2Click
- end
- object Help1: TMenuItem
- Caption = '&Help'
- object Licenseinfo1: TMenuItem
- Caption = 'License info.'
- OnClick = Licenseinfo1Click
- end
- object About1: TMenuItem
- Caption = '&About'
- OnClick = About1Click
- end
- end
- end
- object SaveDialog1: TSaveDialog
- FileName = '*.*'
- Filter = 'avi (video file)|video file'
- Left = 312
- Top = 192
- end
- object FTP1: T_FTP
- Password = 'nobody@nowhere'
- Username = 'ftp'
- Async = False
- Left = 328
- Top = 65
- end
- object TrayIcon1: TTrayIcon
- Active = True
- Icon.Data = {<image000.ico>}
- SeparateIcon = False
- OnClick = TrayIcon1Click
- Left = 342
- Top = 6
- end
- end
-